Personal Computer World 2007 September/PCWSEP07.iso/Software/Shareware/xStarter 1.8.8/setup.exe/{app}/xStartUI.exe/0/RCDATA/TACTIONFORM/TACTIONFORM.txt

Text File | 2007-06-06 | 24KB | 868 lines

object ActionForm: TActionForm
  Left = 202
  Top = 249
  Caption = 'xStarter action params'
  ClientHeight = 398
  ClientWidth = 657
  Color = clBtnFace
  Constraints.MinHeight = 432
  Constraints.MinWidth = 665
  ParentFont = True
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnHide = FormHide
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 354
    Width = 657
    Height = 3
    Align = alBottom
    Shape = bsBottomLine
  end
  object Panel1: TPanel
    Left = 0
    Top = 357
    Width = 657
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    DesignSize = (
      657
      41)
    object btOk: TElPopupButton
      Left = 411
      Top = 8
      Width = 113
      Height = 25
      DrawDefaultFrame = False
      Caption = 'OK'
      TabOrder = 0
      Anchors = [akRight, akBottom]
    end
    object btCancel: TElPopupButton
      Left = 531
      Top = 8
      Width = 113
      Height = 25
      DrawDefaultFrame = False
      ModalResult = 2
      Caption = 'Cancel'
      TabOrder = 1
      Anchors = [akRight, akBottom]
    end
    object btParamSel: TElPopupButton
      Left = 128
      Top = 8
      Width = 121
      Height = 25
      Hint = 'Paste function or action execution result'
      DrawDefaultFrame = False
      Glyph.Data = {
        D6000000424DD60000000000000076000000280000000C0000000C0000000100
        0400000000006000000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777
        0000770777777777000077087007007700007780778007770000778087700077
        0000777087007807000077780777777700007700000777770000777708777777
        0000777700780777000077777000777700007777777777770000}
      Caption = 'Paste function'
      Enabled = False
      TabOrder = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      OnClick = btParamSelClick
    end
    object btHelp: TElPopupButton
      Left = 8
      Top = 8
      Width = 113
      Height = 25
      ImageIndex = 14
      UseImageList = True
      Images = TrayForm.ilMain
      DrawDefaultFrame = False
      Caption = 'Help'
      TabOrder = 3
      OnClick = btHelpClick
      Anchors = [akLeft, akBottom]
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 206
    Height = 354
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 1
    object VST: TVirtualStringTree
      Left = 0
      Top = 0
      Width = 206
      Height = 320
      Align = alClient
      BevelInner = bvNone
      BevelKind = bkTile
      BorderStyle = bsNone
      Ctl3D = True
      DragOperations = [doMove]
      DragType = dtVCL
      Header.AutoSizeIndex = -1
      Header.Font.Charset = DEFAULT_CHARSET
      Header.Font.Color = clWindowText
      Header.Font.Height = -11
      Header.Font.Name = 'MS Sans Serif'
      Header.Font.Style = []
      Header.Options = [hoAutoResize, hoShowHint, hoVisible]
      Header.ParentFont = True
      Header.Style = hsFlatButtons
      HintMode = hmTooltip
      Images = TrayForm.ImageList1
      ParentCtl3D = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
      TreeOptions.SelectionOptions = [toExtendedFocus, toLevelSelectConstraint]
      OnFocusChanged = VSTFocusChanged
      OnFocusChanging = VSTFocusChanging
      OnFreeNode = VSTFreeNode
      OnGetText = VSTGetText
      OnGetImageIndex = VSTGetImageIndex
      Columns = <
        item
          Position = 0
          Width = 204
          WideText = 'Action'
        end>
    end
    object Panel2: TPanel
      Left = 0
      Top = 320
      Width = 206
      Height = 34
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      DesignSize = (
        206
        34)
      object cbCat: TElComboBox
        Left = 8
        Top = 7
        Width = 191
        Height = 21
        Cursor = crIBeam
        Style = csDropDownList
        ItemHeight = 13
        OnChange = cbCatChange
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        TabOrder = 0
        ParentColor = False
        Anchors = [akLeft, akTop, akRight]
      end
    end
  end
  object pcParams: TElPageControl
    Left = 212
    Top = 0
    Width = 445
    Height = 354
    MinTabWidth = 400
    ShowBorder = False
    ShowTabs = False
    TabIndex = 2
    HotTrackFont.Charset = DEFAULT_CHARSET
    HotTrackFont.Color = clBlue
    HotTrackFont.Height = -11
    HotTrackFont.Name = 'MS Sans Serif'
    HotTrackFont.Style = []
    ActivePage = pgTextLoop
    ActiveTabFont.Charset = DEFAULT_CHARSET
    ActiveTabFont.Color = clWindowText
    ActiveTabFont.Height = -11
    ActiveTabFont.Name = 'MS Sans Serif'
    ActiveTabFont.Style = []
    Align = alClient
    ParentColor = False
    TabOrder = 2
    UseXPThemes = False
    DockOrientation = doNoOrient
    object pgNull: TElTabSheet
      PageControl = pcParams
      Caption = 'DCPage1'
      Visible = False
    end
    object pgAction: TElTabSheet
      PageControl = pcParams
      Caption = 'DCPage1'
      Visible = False
      ExplicitWidth = 0
      ExplicitHeight = 0
      object pc: TElPageControl
        Left = 0
        Top = 0
        Width = 445
        Height = 354
        ShowBorder = False
        ShowTabs = False
        TabIndex = 0
        HotTrackFont.Charset = DEFAULT_CHARSET
        HotTrackFont.Color = clBlue
        HotTrackFont.Height = -11
        HotTrackFont.Name = 'MS Sans Serif'
        HotTrackFont.Style = []
        ActivePage = pcNull
        ActiveTabFont.Charset = DEFAULT_CHARSET
        ActiveTabFont.Color = clWindowText
        ActiveTabFont.Height = -11
        ActiveTabFont.Name = 'MS Sans Serif'
        ActiveTabFont.Style = []
        Align = alClient
        ParentColor = False
        TabOrder = 0
        UseXPThemes = False
        DockOrientation = doNoOrient
        object pcNull: TElTabSheet
          PageControl = pc
          Caption = 'DCPage1'
        end
      end
    end
    object pgTextLoop: TElTabSheet
      PageControl = pcParams
      Caption = 'DCPage1'
      DesignSize = (
        445
        354)
      object lbTextLoop: TLabel
        Left = 24
        Top = 28
        Width = 96
        Height = 13
        Caption = 'Set text loop params'
      end
      object lbDelim: TLabel
        Left = 40
        Top = 254
        Width = 64
        Height = 13
        Caption = 'Delimeter text'
      end
      object lbDelimDescr: TLabel
        Left = 40
        Top = 273
        Width = 107
        Height = 13
        Caption = '(If empty then ENTER)'
      end
      object btTextFile: TElPopupButton
        Left = 377
        Top = 217
        Width = 26
        Height = 24
        ImageIndex = 1
        UseImageList = True
        Images = TrayForm.ilMain
        DrawDefaultFrame = False
        Enabled = False
        TabOrder = 5
        OnClick = btTextFileClick
        Anchors = [akTop, akRight]
      end
      object mmSpecText: TElMemo
        Left = 40
        Top = 75
        Width = 364
        Height = 113
        Flat = True
        ScrollBars = ssVertical
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
      end
      object rbSpecText: TElRadioButton
        Left = 40
        Top = 56
        Width = 90
        Height = 17
        Checked = True
        Flat = True
        Caption = 'Specified Text'
        TabOrder = 1
        OnClick = rbSpecTextClick
        DoubleBuffered = False
      end
      object rbExtFile: TElRadioButton
        Left = 40
        Top = 200
        Width = 103
        Height = 17
        Flat = True
        Caption = 'External Text File'
        TabStop = False
        TabOrder = 2
        OnClick = rbSpecTextClick
        DoubleBuffered = False
      end
      object edFile: TElEdit
        Left = 40
        Top = 219
        Width = 335
        Height = 21
        Hint = 'Name'
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        Anchors = [akLeft, akTop, akRight]
        Enabled = False
        TabOrder = 3
      end
      object edDelim: TElEdit
        Left = 192
        Top = 250
        Width = 212
        Height = 21
        Hint = 'Name'
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 4
      end
    end
    object pgIF: TElTabSheet
      PageControl = pcParams
      Caption = 'DCPage2'
      Visible = False
      ExplicitWidth = 0
      ExplicitHeight = 0
      DesignSize = (
        445
        354)
      object lbCond: TLabel
        Left = 24
        Top = 28
        Width = 99
        Height = 13
        Caption = 'Set condition params'
      end
      object lbIf: TLabel
        Left = 24
        Top = 64
        Width = 6
        Height = 13
        Caption = 'If'
      end
      object lbThen: TLabel
        Left = 24
        Top = 144
        Width = 33
        Height = 13
        Caption = 'then ...'
      end
      object lbAddActions: TLabel
        Left = 64
        Top = 168
        Width = 149
        Height = 13
        Caption = '(Add actions here in actions list)'
      end
      object lbDelElse: TLabel
        Left = 64
        Top = 232
        Width = 216
        Height = 13
        Caption = '(Deleting of Else is possible only in actions list)'
        Visible = False
      end
      object edParam: TElEdit
        Left = 64
        Top = 60
        Width = 236
        Height = 21
        Hint = 'Name'
        ReadOnly = True
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 0
        OnClick = edParamClick
        OnDblClick = edParamClick
      end
      object cbCondition: TElComboBox
        Left = 64
        Top = 100
        Width = 53
        Height = 21
        Cursor = crIBeam
        Items.Strings = (
          '='
          '<>'
          '<'
          '>')
        Style = csDropDownList
        ItemHeight = 13
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        TabOrder = 1
        ParentColor = False
      end
      object pcWhat: TElPageControl
        Left = 118
        Top = 98
        Width = 187
        Height = 34
        OnChange = pcWhatChange
        ShowBorder = False
        ShowTabs = False
        TabIndex = 3
        HotTrackFont.Charset = DEFAULT_CHARSET
        HotTrackFont.Color = clBlue
        HotTrackFont.Height = -11
        HotTrackFont.Name = 'MS Sans Serif'
        HotTrackFont.Style = []
        ActivePage = pgStr
        ActiveTabFont.Charset = DEFAULT_CHARSET
        ActiveTabFont.Color = clWindowText
        ActiveTabFont.Height = -11
        ActiveTabFont.Name = 'MS Sans Serif'
        ActiveTabFont.Style = []
        DefaultPage = pgStr
        ParentColor = False
        TabOrder = 2
        UseXPThemes = False
        DockOrientation = doNoOrient
        object pgDate: TElTabSheet
          PageControl = pcWhat
          Caption = 'DCPage2'
          Visible = False
          object edDateWhat: TElDateTimePicker
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Format = edfShortDate
            FormatString = 'c'
            DateTime = 38821.498429722200000000
            Flat = True
            ShowPopupCalendar = True
            CalendarLineColorDark = clWindow
            StartOfWeek = 1
            WeekEndDays = [Sun, Sat]
            CalendarCurrentDayBorder = fbtFlat
            CalendarSelectionBorder = fbtNone
            MinDate = -693593.000000000000000000
            MaxDate = 999999.000000000000000000
            ButtonWidth = 17
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            ButtonVisible = False
            ButtonThinFrame = False
            UnassignedChar = ' '
            TranslateDays = True
            CalendarHolidayColor = clBlack
            DockOrientation = doNoOrient
            ParentColor = False
            TabOrder = 0
            TabStop = True
          end
        end
        object pgBool: TElTabSheet
          PageControl = pcWhat
          Caption = 'DCPage3'
          Visible = False
          DesignSize = (
            187
            34)
          object cbBoolWhat: TElComboBox
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            Items.Strings = (
              'False'
              'True')
            Style = csDropDownList
            ItemHeight = 13
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            TabOrder = 0
            ParentColor = False
            Anchors = [akLeft, akTop, akRight]
          end
        end
        object pgInt: TElTabSheet
          PageControl = pcWhat
          Caption = 'DCPage4'
          Visible = False
          object edNumWhat: TElSpinEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            MaxValue = 2147000000
            MinValue = -2147000000
            Alignment = taRightJustify
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            TabOrder = 0
          end
        end
        object pgStr: TElTabSheet
          PageControl = pcWhat
          Caption = 'DCPage1'
          DesignSize = (
            187
            34)
          object edStrWhat: TElEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Hint = 'Name'
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            Anchors = [akLeft, akTop, akRight]
            TabOrder = 0
          end
        end
        object pgFlt: TElTabSheet
          PageControl = pcWhat
          Caption = 'ElTabSheet1'
          Visible = False
          object edFltWhat: TElFloatSpinEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            Increment = 1.000000000000000000
            LargeIncrement = 10.000000000000000000
            MaxValue = 2147000000.000000000000000000
            MinValue = -2147000000.000000000000000000
            Alignment = taRightJustify
            Ctl3D = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            ParentColor = False
            ParentCtl3D = False
            TabOrder = 0
          end
        end
      end
      object btPstFunc: TElPopupButton
        Left = 305
        Top = 58
        Width = 27
        Height = 25
        DrawDefaultFrame = False
        Glyph.Data = {
          D6000000424DD60000000000000076000000280000000C0000000C0000000100
          0400000000006000000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777
          0000770777777777000077087007007700007780778007770000778087700077
          0000777087007807000077780777777700007700000777770000777708777777
          0000777700780777000077777000777700007777777777770000}
        TabOrder = 3
        ParentShowHint = False
        ShowHint = False
        OnClick = btParamSelClick
        Anchors = [akTop, akRight]
      end
      object chUseElse: TElCheckBox
        Left = 64
        Top = 208
        Width = 64
        Height = 17
        Flat = True
        Caption = 'Use Else'
        TabOrder = 4
      end
    end
    object pgWhile: TElTabSheet
      PageControl = pcParams
      Caption = 'ElTabSheet1'
      Visible = False
      ExplicitWidth = 0
      ExplicitHeight = 0
      DesignSize = (
        445
        354)
      object lbCondW: TLabel
        Left = 24
        Top = 28
        Width = 99
        Height = 13
        Caption = 'Set condition params'
      end
      object lbWhile: TLabel
        Left = 24
        Top = 64
        Width = 27
        Height = 13
        Caption = 'While'
      end
      object lbDo: TLabel
        Left = 24
        Top = 144
        Width = 24
        Height = 13
        Caption = 'do ...'
      end
      object lbAddActionsW: TLabel
        Left = 64
        Top = 168
        Width = 149
        Height = 13
        Caption = '(Add actions here in actions list)'
      end
      object pcWhatW: TElPageControl
        Left = 118
        Top = 98
        Width = 187
        Height = 34
        OnChange = pcWhatWChange
        ShowBorder = False
        ShowTabs = False
        TabIndex = 3
        HotTrackFont.Charset = DEFAULT_CHARSET
        HotTrackFont.Color = clBlue
        HotTrackFont.Height = -11
        HotTrackFont.Name = 'MS Sans Serif'
        HotTrackFont.Style = []
        ActivePage = pgStrW
        ActiveTabFont.Charset = DEFAULT_CHARSET
        ActiveTabFont.Color = clWindowText
        ActiveTabFont.Height = -11
        ActiveTabFont.Name = 'MS Sans Serif'
        ActiveTabFont.Style = []
        DefaultPage = pgStrW
        ParentColor = False
        TabOrder = 0
        UseXPThemes = False
        DockOrientation = doNoOrient
        object pgDateW: TElTabSheet
          PageControl = pcWhatW
          Caption = 'DCPage2'
          Visible = False
          object edDateWhatW: TElDateTimePicker
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Format = edfShortDate
            FormatString = 'c'
            DateTime = 38821.498429722200000000
            Flat = True
            ShowPopupCalendar = True
            CalendarLineColorDark = clWindow
            StartOfWeek = 1
            WeekEndDays = [Sun, Sat]
            CalendarCurrentDayBorder = fbtFlat
            CalendarSelectionBorder = fbtNone
            MinDate = -693593.000000000000000000
            MaxDate = 999999.000000000000000000
            ButtonWidth = 17
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            ButtonVisible = False
            ButtonThinFrame = False
            UnassignedChar = ' '
            TranslateDays = True
            CalendarHolidayColor = clBlack
            DockOrientation = doNoOrient
            ParentColor = False
            TabOrder = 0
            TabStop = True
          end
        end
        object pgBoolW: TElTabSheet
          PageControl = pcWhatW
          Caption = 'DCPage3'
          Visible = False
          DesignSize = (
            187
            34)
          object cbBoolWhatW: TElComboBox
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            Items.Strings = (
              'False'
              'True')
            Style = csDropDownList
            ItemHeight = 13
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            TabOrder = 0
            ParentColor = False
            Anchors = [akLeft, akTop, akRight]
          end
        end
        object pgIntW: TElTabSheet
          PageControl = pcWhatW
          Caption = 'DCPage4'
          Visible = False
          object edNumWhatW: TElSpinEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            MaxValue = 2147000000
            MinValue = -2147000000
            Alignment = taRightJustify
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            TabOrder = 0
          end
        end
        object pgStrW: TElTabSheet
          PageControl = pcWhatW
          Caption = 'DCPage1'
          DesignSize = (
            187
            34)
          object edStrWhatW: TElEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Hint = 'Name'
            Flat = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            Anchors = [akLeft, akTop, akRight]
            TabOrder = 0
          end
        end
        object pgFltW: TElTabSheet
          PageControl = pcWhatW
          Caption = 'ElTabSheet1'
          Visible = False
          object edFltWhatW: TElFloatSpinEdit
            Left = 2
            Top = 2
            Width = 172
            Height = 21
            Cursor = crIBeam
            Increment = 1.000000000000000000
            LargeIncrement = 10.000000000000000000
            MaxValue = 2147000000.000000000000000000
            MinValue = -2147000000.000000000000000000
            Alignment = taRightJustify
            Ctl3D = True
            LineBorderActiveColor = clBlack
            LineBorderInactiveColor = clBlack
            ParentColor = False
            ParentCtl3D = False
            TabOrder = 0
          end
        end
      end
      object edParamW: TElEdit
        Left = 64
        Top = 60
        Width = 236
        Height = 21
        Hint = 'Name'
        ReadOnly = True
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        Anchors = [akLeft, akTop, akRight]
        TabOrder = 1
        OnClick = edParamWClick
        OnDblClick = edParamWClick
      end
      object btPstFuncW: TElPopupButton
        Left = 305
        Top = 58
        Width = 27
        Height = 25
        DrawDefaultFrame = False
        Glyph.Data = {
          D6000000424DD60000000000000076000000280000000C0000000C0000000100
          0400000000006000000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777
          0000770777777777000077087007007700007780778007770000778087700077
          0000777087007807000077780777777700007700000777770000777708777777
          0000777700780777000077777000777700007777777777770000}
        TabOrder = 2
        ParentShowHint = False
        ShowHint = False
        OnClick = btParamSelClick
        Anchors = [akTop, akRight]
      end
      object cbConditionW: TElComboBox
        Left = 64
        Top = 100
        Width = 53
        Height = 21
        Cursor = crIBeam
        Items.Strings = (
          '='
          '<>'
          '<'
          '>')
        Style = csDropDownList
        ItemHeight = 13
        Flat = True
        LineBorderActiveColor = clBlack
        LineBorderInactiveColor = clBlack
        TabOrder = 3
        ParentColor = False
      end
    end
  end
  object ElSplitter1: TElSplitter
    Left = 206
    Top = 0
    Width = 6
    Height = 354
    MinSizeTopLeft = 150
    MinSizeBottomRight = 440
    SnapBottomRight = False
    ControlTopLeft = Panel3
    ControlBottomRight = pcParams
    ShowSnapButton = True
    Align = alLeft
  end
  object ElFormPersist1: TElFormPersist
    Storage = TrayForm.ElIniFile1
    PersistOptions = [epoState, epoPosition, epoSize]
    TopMost = False
    Left = 80
    Top = 72
    PropsToStore = {00000000}
  end
end